home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'VirtIntf.pas' rev: 3.00
-
- #ifndef VirtIntfHPP
- #define VirtIntfHPP
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Virtintf
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TInterface;
- class PASCALIMPLEMENTATION TInterface : public System::TObject
- {
- typedef System::TObject inherited;
-
- private:
- int FRefCount;
-
- public:
- __fastcall TInterface(void);
- HIDESBASE void __fastcall Free(void);
- virtual int __stdcall AddRef(void);
- virtual int __stdcall Release(void);
- virtual int __stdcall GetVersion(void);
- public:
- /* TObject.Destroy */ __fastcall virtual ~TInterface(void) { }
-
- };
-
- class DELPHICLASS TIStream;
- class PASCALIMPLEMENTATION TIStream : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual int __stdcall Read(void *Buffer, int Count) = 0;
- virtual int __stdcall Write(const void *Buffer, int Count) = 0;
- virtual int __stdcall Seek(int Offset, Word Origin) = 0;
- virtual int __stdcall GetModifyTime(void) = 0;
- virtual void __stdcall SetModifyTime(int Time) = 0;
- virtual void __stdcall Flush(void) = 0;
- public:
- /* TInterface.Create */ __fastcall TIStream(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIStream(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE System::AnsiString __fastcall ReleaseException(void);
-
- } /* namespace Virtintf */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Virtintf;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // VirtIntf
-